home *** CD-ROM | disk | FTP | other *** search
- /*
- * File: Alert.c
- * Description: Displays given parameter in an standard system-alert.
- * Version: 1.1
- * Author: Ketil Hunn
- * Mail: hunn@dhmolde.no
- *
- * Copyright © 1993 Ketil Hunn.
- *
- * In order to list the source-files included in this package properly,
- * the TAB size should be set at 2.
- *
- * To compile and link:
- * sc link optimize nostandardio smallcode smalldata Alert.c
- */
-
- #include <stdlib.h>
- #include <string.h>
- #include <intuition/intuition.h>
- #include <clib/intuition_protos.h>
- #include <clib/exec_protos.h>
- #include "Includes/MyAlert.h"
- #include "ENV:current_date.h"
-
- #define PROGRAM "Alert"
- #define VERSION "V1.1"
- char const *version = "$VER: " PROGRAM " " VERSION " (" CURRENT_DATE ")";
-
- struct IntuitionBase *IntuitionBase;
-
- main(int argc, char *argv[]) {
- if(IntuitionBase=(struct IntuitionBase *)OpenLibrary("intuition.library",33))
- {
- if(argc<2 || !(strcmp(argv[1],"?")))
- MyAlert(RECOVERY_ALERT,
- PROGRAM " " VERSION " © 1993 Ketil Hunn\n"
- "Usage: Alert TEXTLINE/M\n\n"
- "Each given parameter will appear as one line of text "
- "in the alert.");
- else
- {
- int i=0;
- char *text;
-
- if(text=malloc(2400))
- {
- strcpy(text,argv[1]);
- for(i=2; i<argc; ++i)
- {
- strcat(text,"\n");
- strcat(text,argv[i]);
- }
- MyAlert(RECOVERY_ALERT,text);
- free(text);
-
- }
- else
- MyAlert(RECOVERY_ALERT,"Out of memory!");
- }
- CloseLibrary((struct Library *)IntuitionBase);
- }
- exit(0);
- }
-